add doc slot into comp-func struct

diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index c52cef6e94f75f30f164e4a186774dabd06332a1..8a9305a59b8f20452199c96ecd6154334cc3b1fc 100644 (file)
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -205,6 +205,8 @@ Is in use to help the SSA rename pass."))
                :documentation "The function name in the native world.")
   (byte-func nil
              :documentation "Byte compiled version.")
+  (doc nil :type string
+       :documentation "Doc string.")
   (lap () :type list
        :documentation "LAP assembly representation.")
   (args nil :type comp-args-base)